      LOGICAL        TPRI12, TPRI34, TCON12, TCON34,
     &               DIAG12, DIAG34, DIAC12, DIAC34,
     &               GEN12, GEN34, NOCNT, SPIORB, DC10, DC1E, DC2H,
     &               DC2E, CROSS, PATH1, RPRI12, RPRI34, RCNT12, RCNT34,
     &               SPHR1, SPHR2, SPHR3, SPHR4, SPHR12, SPHR34
      COMMON /TWOAO/ NHKT1, NHKT2, NHKT3, NHKT4,
     &               KCKT1, KCKT2, KCKT3, KCKT4, KCKT12, KCKT34, KCKMX,
     &               KHKT1, KHKT2, KHKT3, KHKT4, KHKT12, KHKT34,
     &               NORB1, NORB2, NORB3, NORB4, NORB12, NORB34, NO1234,
     &               NORR1, NORR2, NORR3, NORR4,
     &               NUC1, NUC2, NUC3, NUC4,
     &               NUC12, NUC34, MXUC12, MXUC34,
     &               NUCR1, NUCR2, NUCR3, NUCR4,
     &               NSET1, NSET2, NSET3, NSET4,
     &               MAX12, MAX34, JMAX1, JMAX2, JMAX3, JMAX4,
     &               TPRI12, TPRI34, TCON12, TCON34,
     &               DIAG12, DIAG34, DIAC12, DIAC34,
     &               I120X, I120Y, I120Z, I340X, I340Y, I340Z,
     &               GEN12, GEN34, IHRSYM, NOCNT,
     &               IDERIV, JM1234, IPATH, NU1234, NTUV34, KTUV34,
     &               SPIORB, DC10, DC1E, DC2H, DC2E, CROSS, PATH1,
     &               NCCPP, NC1234, RPRI12, RPRI34, RCNT12, RCNT34,
     &               SPHR1, SPHR2, SPHR3, SPHR4, SPHR12, SPHR34
